home *** CD-ROM | disk | FTP | other *** search
/ The Ultimate Frank Lloyd…ght - America's Architect / Ultimate Frank Lloyd Wright, The - America's Architect (1994)(Microsoft Home).iso / pre / flw / flwchl.dir / 00076_Script_76 < prev    next >
Text File  |  1994-11-15  |  5KB  |  175 lines
  1. on startMovie
  2.   cursor 4
  3.   global nowFrame, currMM
  4.   global horNess, dialogOn
  5.   set dialogOn = FALSE
  6.   set currMM = "FLWWW"
  7.   puppetSprite 22, TRUE
  8.   puppetSprite 23, TRUE
  9.   puppetSprite 21, TRUE
  10.   puppetSprite 14, TRUE
  11.   puppetSprite 8, TRUE
  12.   set the immediate of sprite 23 to TRUE
  13.   set the stretch of sprite 23 to FALSE
  14.   cursor -1
  15. end startMovie
  16.  
  17. on stepMovie
  18.   global nowFrame,currFrame
  19.   if nowFrame <> currFrame then
  20.     seeAlsoList
  21.     set currFrame = nowFrame
  22.   end if
  23. end stepMovie
  24.  
  25. on stopMovie
  26.   set the castNum of sprite 21 to 1050
  27.   puppetSprite 21, FALSE
  28.   put " " into field "SeeAlsoText"
  29.   updateStage
  30. end stopMovie
  31.  
  32. on saveLocals
  33.   global lastFrame, nowFrame, lastMovie
  34.   set lastMovie = "FLWCHL"
  35.   set lastFrame = nowFrame
  36. end saveLocals
  37.  
  38. on buttonState
  39.   global bflag, FrankNav, dialogOn
  40.   
  41.   
  42.   if dialogOn = FALSE then
  43.     
  44.     if rollover(15) then
  45.       periodRoll
  46.     else 
  47.       set the locV of sprite 14 to 490
  48.     end if
  49.     
  50.     -- don't check global buttons unless mouse is down at bottom
  51.     if (the mouseV > 200) or (bFlag = TRUE) then
  52.       set bFlag = FALSE
  53.       doState
  54.     end if
  55.   else if dialogOn = TRUE then
  56.     if the mouseDown then 
  57.       if the mouseCast <> the number of cast "glossDialog" then
  58.         beep
  59.       end if
  60.     end if
  61.   end if
  62. end buttonState
  63.  
  64. on chBackStep
  65.   global nowFrame
  66.   unLoadCast 10,75
  67.   puppetSprite 8, FALSE
  68.   if nowFrame = "ch000bld118°°°" then
  69.     puppetTransition 1, 0, 8
  70.     go to frame "ch000bld117°°°" of movie "FLWCHK"
  71.   else
  72.     puppetTransition 1, 0, 8
  73.     go marker (-1)
  74.   end if
  75.   puppetSprite 8, TRUE
  76.   updateStage
  77. end chBackStep
  78.  
  79. on chForStep
  80.   global nowFrame
  81.   unLoadCast 10,75
  82.   puppetSprite 8, FALSE
  83.   if nowFrame = "ch000bld150°°°" then
  84.     puppetTransition 2, 0, 8
  85.     go to frame "ch000bld001°°°" of movie "FLWCHE"
  86.   else
  87.     puppetTransition 2, 0, 8
  88.     go marker (+1)
  89.   end if
  90.   puppetSprite 8, TRUE
  91.   updateStage
  92. end chForStep
  93.  
  94. on textRoll txHt
  95.   global topHat, horNess, dialogOn, seeAlsoBox
  96.   
  97.   if dialogOn = FALSE and seeAlsoBox = FALSE then
  98.     
  99.     set topHat = txHt
  100.     
  101.     if horNess = "ver" then
  102.       if the mouseH < 230 and the mouseV > 366 and the mouseV < 429 then
  103.         set the locV of sprite 8 to txHt
  104.         set the ink of sprite 16 to 8
  105.         set the foreColor of sprite 16 to 215
  106.         set rolledAlready = TRUE
  107.       else if the mouseH > 230 or the mouseV > 429 or the mouseV < topHat then
  108.         set the locV of sprite 8 to 364
  109.         set the ink of sprite 16 to 36
  110.         set the forecolor of sprite 16 to 0
  111.       end if
  112.       set horNess = "h"
  113.     else
  114.       if the mouseH < 414 and the mouseV > 366 and the mouseV < 429 then
  115.         set the locV of sprite 8 to txHt
  116.         set the ink of sprite 16 to 8
  117.         set the foreColor of sprite 16 to 215
  118.         set rolledAlready = TRUE
  119.       else if the mouseH > 414 or the mouseV > 429 or the mouseV < topHat then
  120.         set the locV of sprite 8 to 364
  121.         set the ink of sprite 16 to 36
  122.         set the forecolor of sprite 16 to 0
  123.       end if
  124.     end if
  125.     --updateStage
  126.   end if
  127. end textRoll
  128.  
  129. on periodRoll
  130.   global perV, thumbTrack
  131.   put the mouseV - 206 into perV
  132.   put perV / 24 into perV
  133.   if perV = 0 then
  134.     set the locV of sprite 14 to 206
  135.   else if perV = 1 then
  136.     set the locV of sprite 14 to 230
  137.   else if perV = 2 then
  138.     set the locV of sprite 14 to 254
  139.   else if perV = 3 then
  140.     set the locV of sprite 14 to 278
  141.   else if perV = 4 then
  142.     set the locV of sprite 14 to 302
  143.   else if perV = 5 then
  144.     set the locV of sprite 14 to 326
  145.   else if perV = 6 then
  146.     set the locV of sprite 14 to 350
  147.   else if perV = 7 then
  148.     set the locV of sprite 14 to 374
  149.   end if
  150.   updateStage
  151. end periodRoll
  152.  
  153. on goPeriod
  154.   global perV, adjPerOn
  155.   puppetSprite 8, FALSE
  156.   if perV = 0 then
  157.     go to frame "ch000bld001°°°" of movie "FLWCHE"
  158.   else if perV = 1 then
  159.     go to frame "ch000bld003°°°" of movie "FLWCHE"
  160.   else if perV = 2 then
  161.     go to frame "ch000bld019°°°" of movie "FLWCHF"
  162.   else if perV = 3 then
  163.     go to frame "ch000bld061°°°" of movie "FLWCHG"
  164.   else if perV = 4 then
  165.     go to frame "ch000bld074°°°" of movie "FLWCHG"
  166.   else if perV = 5 then
  167.     go to frame "ch000bld083°°°" of movie "FLWCHJ"
  168.   else if perV = 6 then
  169.     go to frame "ch000bld100°°°" of movie "FLWCHK"
  170.   else if perV = 7 then
  171.     go to frame "ch000bld118°°°"
  172.     puppetSprite 8, TRUE
  173.   end if
  174.   updateStage
  175. end goPeriod